(remote-compile): Make comint-file-name-prefix local

in the compilation buffer.

diff --git a/lisp/rcompile.el b/lisp/rcompile.el
index c91627160ebddc17248abd79ef2470f68485308e..ec97c7c4dcbfa75f33901f8433e5466876542a10 100644 (file)
--- a/lisp/rcompile.el
+++ b/lisp/rcompile.el
@@ -173,6 +173,7 @@ See \\[compile]."
     ;; compilation-parse-errors will find referenced files by ange-ftp.
     (save-excursion
       (set-buffer compilation-last-buffer)
+      (make-variable-buffer-local 'comint-file-name-prefix)
       (setq comint-file-name-prefix (concat "/" host ":")))))
 
 ;;; rcompile.el ends here